home *** CD-ROM | disk | FTP | other *** search
- % Support for writing UNIX-style documentation (based on webmac.tex)
-
-
- \catcode`\@=11 % for a little while
-
-
- % More fonts
-
- \font\sixteentex=cmtex10 scaled\magstep2
- \font\twelvetex=cmtex10 scaled\magstep1
- \font\tentex=cmtex10
- \font\eighttex=cmtex10
-
- \def\curfont{%
- \ifcase\font@no
- \rm\or
- \it\or
- \sl\or
- \bf\or
- \tt\or
- \sc\or
- \sf\or
- \tx
- \else \errmessage{font madness}\fi
- }
-
- \chardef\AM=`\& % ampersand
- \chardef\BS=`\\ % backslash
- \chardef\LB=`\{ % left brace
- \chardef\RB=`\} % right brace
- \def\LQ{{\tt\char'22}} % left quote
- \def\RQ{{\tt\char'23}} % right quote
- \def\SP{{\tt\char`\ }} % space
- \chardef\TL=`\~ % tilde
- \chardef\UL=`\_ % underline
-
- \def\everypointsize#1#2{%
- \def\tx{%
- \font@no=8
- \csname#1tex\endcsname
- \let\&=\AM \let\\=\BS \let\{=\LB \let\`=\LQ
- \let\}=\RB \let\'=\RQ \let\ =\SP \let\~=\TL
- \let\_=\UL
- }%
- }
-
- \curtype
-
-
- % Standard Characters
-
- \def\#{\hbox{\tt\char`\#}} % parameter sign
- \def\${\hbox{\tt\char`\$}} % dollar sign
- \def\%{\hbox{\tt\char`\%}} % percent sign
- \def\^{\ifmmode\mathchar"222 \else\char`^ \fi} % pointer or hat
-
-
- % Examples
-
- \def\eg#1{\hbox{\tx``#1''}} % in-line
-
- \def\example#1\endexample{% % multi-line
- $$%
- \displayindent=\leftskip
- \advance\displayindent by1.5\parindent
- \let\\=\cr
- \tabskip=0pt
- \halign{%
- \leftline{\tx\ignorespaces##\unskip}\cr
- #1\cr
- }$$%
- }
-
-
- % Miscellany
-
- \def\pgm#1{{\it#1}} % UNIX programs
- \def\man#1(#2){\pgm{#1\/}(#2)} % manual entries
- \def\arg#1{\hbox{\tx`{}#1'{}}} % arguments to programs
- \def\switch#1{\hbox{\tx`{}-#1'{}}} % switches to programs
- \def\file#1{\hbox{\sl#1}} % filename
- \def\bq#1{`{}#1`{}} % back-quoted command
-
-
- % Commonly used software systems
-
- \def\EMACS/{{\sf EMACS}}
- \def\INFO/{{\sf INFO}}
- \def\MLisp/{{\sf MLisp}}
-
- \def\MH/{{\sf MH}}
- \def\UUCP/{{\sf UUCP}}
- \def\SendMail/{{\sf SendMail}}
- \def\Mail/{{\sf Mail}}
- \def\sequences/{{sequences}}
- \def\mh#1{{\sf mh.#1}}
- \def\context/{\file{context}}
- \def\profile/{\file{.mh\_profile}}
- \def\whatnow/{{\tx What now?\/}}
-
- \def\MMDF/{{\sf MMDF}}
- \def\MMDFII/{{\sf MMDF-II}}
-
- \def\AMSPPT.STY/{{\tt amsppt.sty}}
- \ifundefined{AmsTeX}
- \def\AmSTeX{%
- $\cal A$\kern-.1667em\lower.5ex\hbox{$\cal M$}\kern-.125em
- $\cal S$-\TeX
- }%
- \fi
-
- \def\DISS.STY/{{\tt diss.sty}}
- \def\PhDTeX{PhD-\TeX}
-
- \def\ROFF/{{\sf ROFF}}
-
- \def\TTYD/{{\sf TTYD}}
-
-
- \catcode`\@=12 % back to normal
-